home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / script / script_s.sty (.txt) < prev    next >
Texinfo Document  |  1993-12-05  |  19KB  |  546 lines
  1. % script_s.sty -- by Frank Neukam  (01 Dec 1993)
  2. % based on Leslie Lamport's article style.
  3. \typeout{Document Style `script_s' v2.0 by Frank Neukam <01 Dec 1993>}
  4. \ifx\selectfont\undefined
  5.  \font\tensfb  =cmssbx10 scaled \magstep0
  6.  \font\elvsfb  =cmssbx10 scaled \magstephalf
  7.  \font\twlsfb  =cmssbx10 scaled \magstep1
  8.  \font\frtnsfb =cmssbx10 scaled \magstep2
  9.  \font\svtnsfb =cmssbx10 scaled \magstep3
  10.  \font\twtysfb =cmssbx10 scaled \magstep4
  11.  \font\twfvsfb =cmssbx10 scaled \magstep5
  12. \else
  13.  \def\tensfb{\family{\sfdefault}\series{bx}\shape{n}\size{10}{12pt}\selectfont}
  14.  \def\elvsfb{\family{\sfdefault}\series{bx}\shape{n}\size{11}{13.6pt}\selectfont}
  15.  \def\twlsfb{\family{\sfdefault}\series{bx}\shape{n}\size{12}{14.5pt}\selectfont}
  16.  \def\frtnsfb{\family{\sfdefault}\series{bx}\shape{n}\size{14}{18pt}\selectfont}
  17.  \def\svtnsfb{\family{\sfdefault}\series{bx}\shape{n}\size{17}{22pt}\selectfont}
  18.  \def\twtysfb{\family{\sfdefault}\series{bx}\shape{n}\size{20}{25pt}\selectfont}
  19.  \def\twfvsfb{\family{\sfdefault}\series{bx}\shape{n}\size{25}{30pt}\selectfont}
  20. \def\@ptsize{1}
  21. \@namedef{ds@10pt}{\def\@ptsize{0}}
  22. \@namedef{ds@11pt}{\def\@ptsize{1}}
  23. \@namedef{ds@12pt}{\def\@ptsize{2}}
  24. \newdimen\paperwidth
  25. \newdimen\paperheight
  26. \paperwidth 210mm
  27. \paperheight 297mm
  28. \@namedef{ds@DINA3}{\paperwidth=297mm \paperheight=420mm}
  29. \@namedef{ds@DINA4}{\paperwidth=210mm \paperheight=297mm}
  30. \@namedef{ds@DINA5}{\paperwidth=148.5mm \paperheight=210mm}
  31. \@namedef{ds@DINA6}{\paperwidth=105mm \paperheight=148.5mm}
  32. \@namedef{ds@DINA3l}{\paperwidth=420mm \paperheight=297mm}
  33. \@namedef{ds@DINA4l}{\paperwidth=297mm \paperheight=210mm}
  34. \@namedef{ds@DINA5l}{\paperwidth=210mm \paperheight=148.5mm}
  35. \@namedef{ds@DINA6l}{\paperwidth=148.5mm \paperheight=105mm}
  36. \def\ds@draft{\overfullrule 5pt}
  37. \def\ds@twoside{\@twosidetrue \@mparswitchtrue}
  38. \@options
  39. \input script1\@ptsize.sty\relax
  40. \normalsize
  41. \newif\if@hincl
  42. \def\headincludeon{\@hincltrue}
  43. \def\headincludeoff{\@hinclfalse}
  44. \newif\if@hsl
  45. \def\headseplineon{\@hsltrue \@hincltrue}
  46. \def\headseplineoff{\@hslfalse \@hinclfalse}
  47. \headseplineoff
  48. \newif\if@fincl
  49. \def\footincludeon{\@fincltrue}
  50. \def\footincludeoff{\@finclfalse}
  51. \newif\if@fsl
  52. \def\footseplineon{\@fsltrue \@fincltrue}
  53. \def\footseplineoff{\@fslfalse \@finclfalse}
  54. \footseplineoff
  55. \newdimen\sc@bcor
  56. \newcount\sc@div
  57. \newdimen\sc@hblk
  58. \newdimen\sc@vblk
  59. \newdimen\sc@temp
  60. \def\typearea{\@ifnextchar [{\@typearea}{\@typearea[0mm]}}
  61. \def\@typearea[#1]#2{
  62.  \normalsize
  63.  \sc@bcor #1
  64.  \sc@div=#2
  65.  \sc@hblk \paperwidth
  66.  \advance \sc@hblk by -\sc@bcor
  67.  \divide\sc@hblk by \sc@div
  68.  \oddsidemargin -1in
  69.  \evensidemargin -1in
  70.  \if@twoside
  71.   \advance\oddsidemargin by \sc@hblk
  72.   \advance\oddsidemargin by \sc@bcor
  73.   \advance\evensidemargin by 2\sc@hblk
  74.  \else
  75.   \advance\oddsidemargin by 1.5\sc@hblk
  76.   \advance\oddsidemargin by \sc@bcor
  77.   \evensidemargin\oddsidemargin
  78.  \textwidth \paperwidth
  79.  \advance\textwidth by -\sc@bcor
  80.  \advance\textwidth by -3\sc@hblk
  81.  \headheight 15pt
  82.  \headsep 1.5\baselineskip
  83.  \footskip 3.5\baselineskip
  84.  \sc@vblk \paperheight
  85.  \divide\sc@vblk by \sc@div
  86.  \sc@temp \paperheight
  87.  \advance\sc@temp by -3\sc@vblk
  88.  \if@hincl
  89.   \advance\sc@temp by -\headheight
  90.   \advance\sc@temp by -\headsep
  91.  \if@fincl
  92.   \advance\sc@temp by -\footskip
  93.  \textheight \topskip
  94.  \@whiledim\textheight<\sc@temp
  95.   \do{\advance\textheight by \baselineskip}
  96.  \topmargin \sc@vblk
  97.  \advance\topmargin by -1in
  98.  \if@hincl \else
  99.   \advance\topmargin by -\headheight
  100.   \advance\topmargin by -\headsep
  101.  \if@twoside
  102.   \marginparwidth 1.5\sc@hblk
  103.  \else
  104.   \marginparwidth \sc@hblk
  105.  \marginparsep 1cc
  106.  \marginparpush 0.45\baselineskip}
  107. \def\areaset{\@ifnextchar [{\@areaset}{\@areaset[0mm]}}
  108. \def\@areaset[#1]#2#3{
  109.  \normalsize
  110.  \sc@bcor #1
  111.  \textwidth #2
  112.  \textheight #3
  113.  \sc@hblk \paperwidth
  114.  \advance\sc@hblk by -\sc@bcor
  115.  \advance\sc@hblk by -\textwidth
  116.  \divide\sc@hblk by 3
  117.  \oddsidemargin -1in
  118.  \evensidemargin -1in
  119.  \if@twoside
  120.   \advance\oddsidemargin by \sc@hblk
  121.   \advance\oddsidemargin by \sc@bcor
  122.   \advance\evensidemargin by 2\sc@hblk
  123.  \else
  124.   \advance\oddsidemargin by 1.5\sc@hblk
  125.   \advance\oddsidemargin by \sc@bcor
  126.   \evensidemargin\oddsidemargin
  127.  \headheight 15pt
  128.  \headsep 1.5\baselineskip
  129.  \footskip 3.5\baselineskip
  130.  \sc@vblk \paperheight
  131.  \advance\sc@vblk by -\textheight
  132.  \divide\sc@vblk by 3
  133.  \if@hincl
  134.   \advance\textheight by -\headheight
  135.   \advance\textheight by -\headsep
  136.  \if@fincl
  137.   \advance\textheight by -\footskip
  138.  \topmargin \sc@vblk
  139.  \advance\topmargin by -1in
  140.  \if@hincl \else
  141.   \advance\topmargin by -\headheight
  142.   \advance\topmargin by -\headsep
  143.  \if@twoside
  144.   \marginparwidth 1.5\sc@hblk
  145.  \else
  146.   \marginparwidth \sc@hblk
  147.  \marginparsep 1cc
  148.  \marginparpush 0.45\baselineskip}
  149. \ifcase \@ptsize\relax \typearea{8} \or \typearea{10} \or \typearea{12} \fi
  150. \parskip 0pt plus 1pt
  151. \parindent 1em
  152. \partopsep 3pt plus 2pt minus 2pt
  153. \footnotesep 0.6\baselineskip
  154. \skip\footins 0.75\baselineskip plus 4pt minus 2pt
  155. \skip\@mpfootins = \skip\footins
  156. \columnsep 1cc
  157. \columnseprule 0pt
  158. \floatsep 1\baselineskip plus 2pt minus 2pt
  159. \textfloatsep 20pt plus 2pt minus 4pt
  160. \intextsep 1\baselineskip plus 2pt minus 2pt
  161. \@maxsep 20pt
  162. \dblfloatsep 1\baselineskip plus 2pt minus 2pt
  163. \dbltextfloatsep 20pt plus 2pt minus 4pt
  164. \@dblmaxsep 20pt
  165. \@fptop 0pt plus 1fil
  166. \@fpsep 0.7\baselineskip plus 2fil
  167. \@fpbot 0pt plus 1fil
  168. \@dblfptop 0pt plus 1fil
  169. \@dblfpsep 0.7\baselineskip plus 2fil
  170. \@dblfpbot 0pt plus 1fil
  171. \arraycolsep 5pt
  172. \tabcolsep 6pt
  173. \arrayrulewidth 0.4pt
  174. \doublerulesep 2pt
  175. \fboxsep 3pt
  176. \fboxrule 0.4pt
  177. \tabbingsep \labelsep
  178. \labelsep .5em
  179. \leftmargini 2.5em
  180. \leftmarginii 2.2em
  181. \leftmarginiii 1.87em
  182. \leftmarginiv 1.7em
  183. \leftmarginv 1em
  184. \leftmarginvi 1em
  185. \leftmargin\leftmargini
  186. \labelwidth\leftmargini
  187. \advance\labelwidth-\labelsep
  188. \def\@listI{\leftmargin\leftmargini
  189.  \topsep 0.8em plus 0.2em minus 0.4em
  190.  \parsep 0.4em plus 2pt minus 1pt
  191.  \itemsep \parsep}
  192. \let\@listi\@listI
  193. \@listi
  194. \def\@listii{\leftmargin\leftmarginii
  195.  \labelwidth\leftmarginii\advance\labelwidth-\labelsep
  196.  \topsep 0.4em plus 2pt minus 1pt
  197.  \parsep 0.2em plus 1pt minus 1pt
  198.  \itemsep \parsep}
  199. \def\@listiii{\leftmargin\leftmarginiii
  200.  \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
  201.  \topsep 0.2em plus 1pt minus 1pt
  202.  \parsep \z@
  203.  \partopsep 1pt plus 0pt minus 1pt
  204.  \itemsep \topsep}
  205. \def\@listiv{\leftmargin\leftmarginiv
  206.  \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
  207. \def\@listv{\leftmargin\leftmarginv
  208.  \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
  209. \def\@listvi{\leftmargin\leftmarginvi
  210.  \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
  211. \@lowpenalty 51
  212. \@medpenalty 151
  213. \@highpenalty 301
  214. \@beginparpenalty -\@lowpenalty
  215. \@endparpenalty -\@lowpenalty
  216. \@itempenalty -\@lowpenalty
  217. \def\theenumi{\arabic{enumi}}
  218. \def\theenumii{\alph{enumii}}
  219. \def\theenumiii{\roman{enumiii}}
  220. \def\theenumiv{\Alph{enumiv}}
  221. \def\labelenumi{\theenumi.}
  222. \def\labelenumii{\theenumii)}
  223. \def\labelenumiii{\theenumiii.}
  224. \def\labelenumiv{\theenumiv.}
  225. \def\p@enumii{\theenumi}
  226. \def\p@enumiii{\theenumi\theenumii)}
  227. \def\p@enumiv{\p@enumiii\theenumiii}
  228. \def\labelitemi{$\bullet$}
  229. \def\labelitemii{\bf --}
  230. \def\labelitemiii{$\triangleright$}
  231. \def\labelitemiv{$\cdot$}
  232. \newcounter{part}
  233. \newcounter {section}
  234. \newcounter {subsection}[section]
  235. \newcounter {subsubsection}[subsection]
  236. \newcounter {paragraph}[subsubsection]
  237. \newcounter {subparagraph}[paragraph]
  238. \def\thepart {\Roman{part}}
  239. \def\thesection {\arabic{section}}
  240. \def\thesubsection {\thesection.\arabic{subsection}}
  241. \def\thesubsubsection {\thesubsection .\arabic{subsubsection}}
  242. \def\theparagraph {\thesubsubsection.\arabic{paragraph}}
  243. \def\thesubparagraph {\theparagraph.\arabic{subparagraph}}
  244. \setcounter{secnumdepth}{3}
  245. \setcounter{tocdepth}{3}
  246. \def\verse{\let\\=\@centercr
  247.  \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent
  248.  \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}
  249. \let\endverse\endlist
  250. \def\quotation{\list{}{\listparindent 1em
  251.  \itemindent\listparindent
  252.  \rightmargin\leftmargin\parsep 0pt plus 1pt}\item[]}
  253. \let\endquotation=\endlist
  254. \def\quote{\list{}{\rightmargin\leftmargin}\item[]}
  255. \let\endquote=\endlist
  256. \def\descriptionlabel#1{\hspace\labelsep \descfont #1}
  257. \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
  258.  \let\makelabel\descriptionlabel}}
  259. \let\enddescription\endlist
  260. \newdimen\descriptionmargin
  261. \descriptionmargin=3em
  262. \def\labelinglabel#1{#1\hfil\sc@septext}
  263. \def\labeling{\@ifnextchar [{\@labeling}{\@labeling[]}}
  264. \def\@labeling[#1]#2{\def\sc@septext{#1}
  265.  \list{}{\settowidth{\labelwidth}{#2#1}
  266.  \leftmargin\labelwidth \advance\leftmargin by \labelsep
  267.  \let\makelabel\labelinglabel}}
  268. \let\endlabeling\endlist
  269. \def\marginline#1{\marginpar%
  270.  {\if@twoside \ifodd\c@page \raggedright \else \raggedleft \fi
  271.   \else \raggedright \fi #1}}
  272. \def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  273.  \else \newpage \fi \thispagestyle{empty}\c@page\z@}
  274. \def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}
  275. \def\@titlehead{}
  276. \long\def\titlehead#1{\def\@titlehead{#1}}
  277. \def\@subject{}
  278. \def\subject#1{\def\@subject{#1}}
  279. \def\maketitle{\par \begingroup
  280.  \def\thefootnote{\fnsymbol{footnote}}
  281.  \def\@makefnmark{\hbox to 0pt{$^{\@thefnmark}$\hss}}
  282.  \if@twocolumn
  283.   \twocolumn[\@maketitle]
  284.  \else
  285.   \newpage \global\@topnum\z@ \@maketitle
  286.  \thispagestyle{plain}\@thanks \endgroup
  287.  \setcounter{footnote}{0}
  288.  \let\maketitle\relax
  289.  \let\@maketitle\relax
  290.  \gdef\@titlehead{}\gdef\@subject{}%
  291.  \gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\thanks\relax}
  292. \def\@maketitle{\newpage
  293.  \ifx\@titlehead\@empty \else
  294.   \noindent\begin{minipage}[t]{\textwidth}
  295.   \@titlehead
  296.   \end{minipage}\par\null\vskip 1em
  297.  \null \vskip 2em
  298.  \ifx\@subject\@empty \else
  299.   {\centering \Large \@subject \par}
  300.   \vskip 1.5em
  301.  \begin{center}
  302.   {\huge \sectfont \@title \par} \vskip 1.5em {\Large \lineskip .5em
  303.   \begin{tabular}[t]{c}\@author
  304.   \end{tabular}\par}
  305.   \vskip 1em {\Large \@date}
  306.  \end{center}
  307.  \par \vskip 5em}
  308. \newif\if@abstrt
  309. \def\abstracton{\@abstrttrue}
  310. \def\abstractoff{\@abstrtfalse}
  311. \def\abstractname{Abstract}
  312. \def\abstract{\if@abstrt \if@twocolumn \section*{\abstractname} \else
  313.  \begin{center} {\sectfont \abstractname \vspace{-.5em}} \end{center}\fi
  314.  \quotation \fi}
  315. \def\endabstract{\if@twocolumn \else \endquotation \fi}
  316. \def\partname{Part}
  317. \def\part{\par \addvspace{4ex} \@afterindentfalse \secdef\@part\@spart}
  318. \def\@part[#1]#2{\ifnum \c@secnumdepth >\m@ne \refstepcounter{part}
  319.  \addcontentsline{toc}{part}{\thepart\hspace{1em}#1}\else
  320.  \addcontentsline{toc}{part}{#1}\fi \markboth{}{}
  321.  {\parindent 0pt \raggedright \ifnum \c@secnumdepth >\m@ne \LARGE \sectfont
  322.  \partname{} \thepart \par\nobreak \fi \huge \sectfont #2\par}\@endpart}
  323. \def\@spart#1{{\parindent 0pt \raggedright \huge \sectfont #1\par}\@endpart}
  324. \def\@endpart{\nobreak \vskip 3ex \@afterheading}
  325. \def\section{\@afterindentfalse \secdef\@section\@ssection}
  326. \def\@section[#1]#2{\ifnum \c@secnumdepth >\z@
  327.   \refstepcounter{section}
  328.   \addcontentsline{toc}{section}{\protect \numberline{\thesection.}#1}
  329.  \else
  330.   \addcontentsline{toc}{section}{#1}\fi
  331.  \sectionmark{#1}
  332.  \@makesectionhead{#2} \@afterheading}
  333. \def\@ssection#1{\@makessectionhead{#1} \@afterheading}
  334. \def\@makesectionhead#1{\vskip 3.5ex plus 1ex minus .2ex {\Large \sectfont
  335.  \@hangfrom{\ifnum \c@secnumdepth >\z@ \thesection.\hskip .7em\fi}%
  336.  {\raggedright \interlinepenalty \@M #1\par}} \nobreak \vskip 2.3ex
  337.  plus .2ex}
  338. \def\@makessectionhead#1{\vskip 3.5ex plus 1ex minus .2ex {\Large \sectfont
  339.  \@hangfrom{}{\raggedright \interlinepenalty \@M #1\par}} \nobreak
  340.  \vskip 2.3ex plus .2ex}
  341. \def\addsec{\secdef\@addsec\@saddsec}
  342. \def\@addsec[#1]#2{\addcontentsline{toc}{section}{#1}
  343.  \if@twoside \markboth{#1}{}\else \markright{#1}\fi \section*{#2}}
  344. \def\@saddsec#1{\section*{#1}\markboth{}{}}
  345. \def\appendix{\par
  346.  \setcounter{section}{0}
  347.  \setcounter{subsection}{0}
  348.  \def\thesection{\Alph{section}}}
  349. \def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus -1ex minus
  350.  -.2ex}{1.5ex plus .2ex}{\large \sectfont}}
  351. \def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus -1ex
  352.  minus -.2ex}{1.5ex plus .2ex}{\sectfont}}
  353. \def\paragraph{\@startsection{paragraph}{4}{\z@}{3.25ex plus 1ex minus
  354.  .2ex}{-1em}{\sectfont}}
  355. \def\subparagraph{\@startsection{subparagraph}{4}{\parindent}{3.25ex plus
  356.  1ex minus .2ex}{-1em}{\sectfont}}
  357. \def\minisec#1{\@afterindentfalse \vskip 1.5ex {\parindent 0pt \raggedright
  358.  \sectfont #1\par\nobreak}\@afterheading}
  359. \def\contentsname{Contents}
  360. \def\@pnumwidth{1.55em}
  361. \def\@tocrmarg {2.55em}
  362. \def\@dotsep{4.5}
  363. \def\tableofcontents{\section*{\contentsname
  364.  \@mkboth{\contentsname}{\contentsname}}
  365.  \@starttoc{toc}}
  366. \def\l@part#1#2{\addpenalty{\@secpenalty}
  367.  \addvspace{2.25em plus 1pt} \begingroup
  368.  \@tempdima 3em \parindent \z@ \rightskip \@pnumwidth \parfillskip
  369.  -\@pnumwidth
  370.  {\sectfont \leavevmode #1\hfil \hbox to\@pnumwidth{\hss #2}}\par
  371.  \nobreak \endgroup}
  372. \def\l@section#1#2{\addpenalty{\@secpenalty}
  373.  \addvspace{1.0em plus 1pt} \@tempdima 1.5em \begingroup
  374.  \parindent \z@ \rightskip \@pnumwidth \parfillskip -\@pnumwidth
  375.  \sectfont \leavevmode \advance\leftskip\@tempdima \hskip -\leftskip%
  376.  #1\nobreak \hfil\nobreak\hbox to\@pnumwidth{\hss #2}\par
  377.  \endgroup}
  378. \def\l@subsection{\@dottedtocline{2}{1.5em}{2.3em}}
  379. \def\l@subsubsection{\@dottedtocline{3}{3.8em}{3.2em}}
  380. \def\l@paragraph{\@dottedtocline{4}{7.0em}{4.1em}}
  381. \def\l@subparagraph{\@dottedtocline{5}{10em}{5em}}
  382. \def\listfigurename{List of Figures}
  383. \def\listoffigures{\section*{\listfigurename\@mkboth
  384.  {\listfigurename}{\listfigurename}} \@starttoc{lof}}
  385. \def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}
  386. \def\listtablename{List of Tables}
  387. \def\listoftables{\section*{\listtablename\@mkboth
  388.  {\listtablename}{\listtablename}} \@starttoc{lot}}
  389. \let\l@table\l@figure
  390. \def\refname{References}
  391. \def\thebibliography#1{\section*{\refname \@mkboth{\refname}{\refname}}
  392.  \list{[\arabic{enumi}]}{\settowidth\labelwidth{[#1]}\leftmargin\labelwidth
  393.  \advance\leftmargin\labelsep
  394.  \usecounter{enumi}}
  395.  \def\newblock{\hskip 0.11em plus 0.33em minus 0.07em}
  396.  \sloppy\clubpenalty4000\widowpenalty4000
  397.  \sfcode`\.=1000\relax}
  398. \let\endthebibliography=\endlist
  399. \def\indexname{Index}
  400. \newif\if@restonecol
  401. \def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
  402.  \columnseprule \z@
  403.  \columnsep 35pt\twocolumn[\section*{\indexname}]
  404.  \@mkboth{\indexname}{\indexname}
  405.  \thispagestyle{plain}\parindent\z@
  406.  \parskip\z@ plus 0.3pt\relax\let\item\@idxitem}
  407. \def\@idxitem{\par\hangindent 40pt}
  408. \def\subitem{\par\hangindent 40pt \hspace*{20pt}}
  409. \def\subsubitem{\par\hangindent 40pt \hspace*{30pt}}
  410. \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
  411. \def\indexspace{\par \vskip 10pt plus 5pt minus 3pt\relax}
  412. \def\footnoterule{\kern-3\p@
  413.  \hrule width 0.4\columnwidth
  414.  \kern 2.6\p@}
  415. \long\def\@makefntext#1{\noindent \sc@temp\columnwidth%
  416.  \advance\sc@temp by -1.5em \hbox to 1em{\hss$^{\@thefnmark}$}\hskip .5em%
  417.  \parbox[t]{\sc@temp}{\parindent 0pt\parskip 0pt\hskip -.5em #1}}
  418. \def\theequation{\arabic{equation}}
  419. \setcounter{topnumber}{2}
  420. \def\topfraction{.7}
  421. \setcounter{bottomnumber}{1}
  422. \def\bottomfraction{.3}
  423. \setcounter{totalnumber}{3}
  424. \def\textfraction{.2}
  425. \def\floatpagefraction{.5}
  426. \setcounter{dbltopnumber}{2}
  427. \def\dbltopfraction{.7}
  428. \def\dblfloatpagefraction{.5}
  429. \long\def\@makecaption#1#2{\vskip 10pt
  430.  \setbox\@tempboxa\hbox{\captfont #1: #2}
  431.  \ifdim \wd\@tempboxa >\hsize \@hangfrom{\captfont #1: }%
  432.  {\captfont #2\par}
  433.  \else \hbox to\hsize{\hfil\box\@tempboxa\hfil}
  434.  \fi}
  435. \def\figurename{Figure}
  436. \newcounter{figure}
  437. \def\thefigure{\@arabic\c@figure}
  438. \def\fps@figure{tbp}
  439. \def\ftype@figure{1}
  440. \def\ext@figure{lof}
  441. \def\fnum@figure{\figurename{} \thefigure}
  442. \def\figure{\@float{figure}}
  443. \let\endfigure\end@float
  444. \@namedef{figure*}{\@dblfloat{figure}}
  445. \@namedef{endfigure*}{\end@dblfloat}
  446. \def\tablename{Table}
  447. \newcounter{table}
  448. \def\thetable{\@arabic\c@table}
  449. \def\fps@table{tbp}
  450. \def\ftype@table{2}
  451. \def\ext@table{lot}
  452. \def\fnum@table{\tablename{} \thetable}
  453. \def\table{\@float{table}}
  454. \let\endtable\end@float
  455. \@namedef{table*}{\@dblfloat{table}}
  456. \@namedef{endtable*}{\end@dblfloat}
  457. \mark{{}{}}
  458. \if@twoside
  459.  \def\ps@plain{\let\@mkboth\@gobbletwo
  460.   \def\@evenhead{}%
  461.   \def\@oddhead{}%
  462.   \def\@evenfoot{\vbox{\hsize=\textwidth
  463.    \if@fsl \hrule \vskip 3pt \fi
  464.    \hbox to \textwidth{\pnumfont\thepage\hfil}}}%
  465.   \def\@oddfoot{\vbox{\hsize=\textwidth
  466.    \if@fsl \hrule \vskip 3pt \fi
  467.    \hbox to \textwidth{\pnumfont\hfil\thepage}}}}
  468.  \def\ps@headings{\let\@mkboth\markboth
  469.   \def\@evenhead{\vbox{\hsize=\textwidth
  470.    \hbox to \textwidth{\headfont\leftmark\hfil}
  471.    \if@hsl \vskip 1.5pt \hrule \fi}}%
  472.   \def\@oddhead{\vbox{\hsize=\textwidth
  473.    \hbox to \textwidth{\headfont\hfil\rightmark}
  474.    \if@hsl \vskip 1.5pt \hrule \fi}}%
  475.   \def\@evenfoot{\vbox{\hsize=\textwidth
  476.    \if@fsl \hrule \vskip 3pt \fi
  477.    \hbox to \textwidth{\pnumfont\thepage\hfil}}}%
  478.   \def\@oddfoot{\vbox{\hsize=\textwidth
  479.    \if@fsl \hrule \vskip 3pt \fi
  480.    \hbox to \textwidth{\pnumfont\hfil\thepage}}}%
  481.   \def\sectionmark##1{\markboth {\ifnum \c@secnumdepth >\z@
  482.    \thesection. \ \fi ##1}{}}%
  483.   \def\subsectionmark##1{\markright {\ifnum \c@secnumdepth >\@ne
  484.    \thesubsection\ \ \fi ##1}}}
  485.  \def\ps@myheadings{\let\@mkboth\@gobbletwo
  486.   \def\@evenhead{\vbox{\hsize=\textwidth
  487.    \hbox to \textwidth{\headfont\leftmark\hfil}
  488.    \if@hsl \vskip 1.5pt \hrule \fi}}%
  489.   \def\@oddhead{\vbox{\hsize=\textwidth
  490.    \hbox to \textwidth{\headfont\hfil\rightmark}
  491.    \if@hsl \vskip 1.5pt \hrule \fi}}%
  492.   \def\@evenfoot{\vbox{\hsize=\textwidth
  493.    \if@fsl \hrule \vskip 3pt \fi
  494.    \hbox to \textwidth{\pnumfont\thepage\hfil}}}%
  495.   \def\@oddfoot{\vbox{\hsize=\textwidth
  496.    \if@fsl \hrule \vskip 3pt \fi
  497.    \hbox to \textwidth{\pnumfont\hfil\thepage}}}%
  498.   \def\sectionmark##1{}%
  499.   \def\subsectionmark##1{}}
  500. \else
  501.  \def\ps@plain{\let\@mkboth\@gobbletwo
  502.   \def\@evenhead{}%
  503.   \def\@oddhead{}%
  504.   \def\@evenfoot{}%
  505.   \def\@oddfoot{\vbox{\hsize=\textwidth
  506.    \if@fsl \hrule \vskip 3pt \fi
  507.    \hbox to \textwidth{\pnumfont\hfil\thepage\hfil}}}}
  508.  \def\ps@headings{\let\@mkboth\markboth
  509.   \def\@evenhead{}%
  510.   \def\@oddhead{\vbox{\hsize=\textwidth
  511.    \hbox to \textwidth{\headfont\hfil\rightmark\hfil}
  512.    \if@hsl \vskip 1.5pt \hrule \fi}}%
  513.   \def\@evenfoot{}%
  514.   \def\@oddfoot{\vbox{\hsize=\textwidth
  515.    \if@fsl \hrule \vskip 3pt \fi
  516.    \hbox to \textwidth{\pnumfont\hfil\thepage\hfil}}}%
  517.   \def\sectionmark##1{\markright {\ifnum \c@secnumdepth >\z@
  518.    \thesection. \ \fi ##1}}%
  519.   \def\subsectionmark##1{}}
  520.  \def\ps@myheadings{\let\@mkboth\@gobbletwo
  521.   \def\@evenhead{}%
  522.   \def\@oddhead{\vbox{\hsize=\textwidth
  523.    \hbox to \textwidth{\headfont\hfil\rightmark\hfil}
  524.    \if@hsl \vskip 1.5pt \hrule \fi}}%
  525.   \def\@evenfoot{}%
  526.   \def\@oddfoot{\vbox{\hsize=\textwidth
  527.    \if@fsl \hrule \vskip 3pt \fi
  528.    \hbox to \textwidth{\pnumfont\hfil\thepage\hfil}}}%
  529.   \def\sectionmark##1{}%
  530.   \def\subsectionmark##1{}}
  531. \def\today{\ifcase\month\or
  532.  January\or February\or March\or April\or May\or June\or
  533.  July\or August\or September\or October\or November\or December\fi
  534.  \space\number\day, \number\year}
  535. \@abstrttrue
  536. \ps@plain
  537. \pagenumbering{arabic}
  538. \onecolumn
  539. \if@twoside \else \raggedbottom \fi
  540. \frenchspacing
  541. \def\captfont{\rm}
  542. \def\descfont{\sfb}
  543. \def\headfont{\it}
  544. \def\pnumfont{\rm}
  545. \def\sectfont{\sfb}
  546.